home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / raytrace / portray / bgam.inc next >
Text File  |  1993-12-30  |  3KB  |  174 lines
  1. define
  2.    object
  3.       name spine
  4.       object
  5.          csg
  6.             intersect
  7.             operand1
  8.                box
  9.                   a (0 1 0)
  10.                   b (2 1.1 6)
  11.                ;
  12.                material
  13.                   called brass
  14.                ;
  15.             ;
  16.             operand2
  17.                csg
  18.                   intersect
  19.                   operand1
  20.                      plane
  21.                         position (1 1 6)
  22.                         normal (-5 6 1)
  23.                      ;
  24.                      material
  25.                         called brass
  26.                      ;
  27.                   ;
  28.                   operand2
  29.                      plane
  30.                         position (1 1 6)
  31.                         normal (5 6 1)
  32.                      ;
  33.                      material
  34.                         called brass
  35.                      ;
  36.                   ;
  37.                ;
  38.             ;
  39.          ;
  40.       ;
  41.    ;
  42.    object
  43.       name bgam-stripes
  44.       object
  45.          spine
  46.             at (0 0 0)
  47.          ;
  48.       ;
  49.       object
  50.          spine
  51.             at (2 0 0)
  52.          ;
  53.       ;
  54.       object
  55.          spine
  56.             at (4 0 0)
  57.          ;
  58.       ;
  59.       object
  60.          spine
  61.             at (6 0 0)
  62.          ;
  63.       ;
  64.       object
  65.          spine
  66.             at (8 0 0)
  67.          ;
  68.       ;
  69.       object
  70.          spine
  71.             at (10 0 0)
  72.          ;
  73.       ;
  74.    ;
  75.    object
  76.       name bgam-half
  77.       object
  78.          csg
  79.             subtract
  80.             operand1
  81.                box
  82.                   a ( 0 0  0)
  83.                   b (14 2 32)
  84.                ;
  85.                material
  86.                   called lead
  87.                ;
  88.             ;
  89.             operand2
  90.                box
  91.                   a ( 1 1    1)
  92.                   b (13 2.1 31)
  93.                ;
  94.                material
  95.                   called rosewood
  96.                ;
  97.             ;
  98.          ;
  99.       ;
  100.       object
  101.          bgam-stripes
  102.             at (1 0 1)
  103.          ;
  104.       ;
  105.       object
  106.          bgam-stripes
  107.             at (13 0 31)
  108.             y-rotate 180
  109.          ;
  110.       ;
  111.       object
  112.          disk
  113.             position (7 1.1 16)
  114.             normal (0 1 0)
  115.             radius 4
  116.          ;
  117.          material
  118.             called brass
  119.          ;
  120.       ;
  121.    ;
  122.    object
  123.       name bgam-whole
  124.       object
  125.          bgam-half
  126.             at (0 0 0)
  127.          ;
  128.       ;
  129.       object
  130.          bgam-half
  131.             at (-14.5 0 0)
  132.          ;
  133.       ;
  134.       object
  135.          cylinder
  136.             from (0 2 6)
  137.             to   (0 2 10)
  138.             radius 0.3
  139.             capped
  140.          ;
  141.          material
  142.             called brass
  143.          ;
  144.       ;
  145.       object
  146.          cylinder
  147.             from (0 2 22)
  148.             to   (0 2 26)
  149.             radius 0.3
  150.             capped
  151.          ;
  152.          material
  153.             called brass
  154.          ;
  155.       ;
  156.  
  157.       object
  158.          red-die
  159.             at (4 2 5)
  160.             y-rotate 15
  161.          ;
  162.       ;
  163.  
  164.       object
  165.          blue-die
  166.             at (7 2 4)
  167.             x-rotate 180
  168.             y-rotate 22
  169.          ;
  170.       ;
  171.  
  172.    ;
  173. ;
  174.